<% Result.MoveNext() loop Result.Close Connection.Close %> Home Income Property Mgmnt. HOA Mgmnt. Services Receivership Services Calsur Team Associations Contact Rentals Available Available Rentals <% dim Result, Connection, sql, ID, count,vID ID = request.querystring("ID") if ID <> "" then sql = "SELECT ID FROM tblData where PropertyId="& ID else sql = "SELECT ID FROM tblData where Id=6" ID=0 end if set Connection = server.createobject("ADODB.Connection") Connection.Open "CalsurDB", "admin", "" set Result = server.createobject("ADODB.Recordset") Result.Open sql, Connection, adOpenKeyset if Result.RecordCount>0 then vID=Result("ID") else vID=6 end if Response.Write("") Response.Write("") Response.Write("") do while not Result.eof Response.Write("") Result.MoveNext() loop Result.Close sql = "SELECT * FROM PropertiesQuery where Id="& ID set Result = server.createobject("ADODB.Recordset") Result.Open sql, Connection, adOpenKeyset do while not Result.eof %> <%Response.write(Result("City"))%>, <%Response.write(Result("ZIP"))%> <%Response.write(Result("Address"))%> <%Response.write(Result("City"))%>,  <%Response.write(Result("Stabrv"))%>  <%Response.write(Result("ZIP"))%> " class="txtFooter03">[Map of Location] <%Response.write(Result("bedbaths"))%> sq/ft: <%Response.write(Result("sqft"))%> Neighborhood: <%Response.write(Result("City"))%> Available: <%Response.write(Result("Availability"))%> <%Response.write(Result("CostperMonth"))%> Description <%Response.write(Result("City"))%> Additional Features <% set Result2 = server.createobject("ADODB.Recordset") sql="select Feature from FeaturesQuery where PropertyID="&ID Result2.Open sql, Connection, adOpenKeyset do while not Result2.eof %> <%Result2.MoveNext() loop Result2.Close%> • <%Response.write(Result2("Feature"))%> Landlord Comments <%Response.write(Result("Comments"))%> Contact Information Agent: <%Response.write(Result("AgentName"))%> Contact Phone: <%Response.write(Result("phone"))%> Fax Number: <%Response.write(Result("fax"))%> Email Address: " class="txtContnt01"><%Response.write(Result("email"))%> Possession: <%Response.write(Result("Possession"))%>

Calsur Management & Realty 4770 Clairemont Mesa Blvd. – San Diego, CA 92117 Email | calsur@aol.com Toll Free | 877  581  1158 Phone | 858  560  1178 Fax | 858  560  6709